home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / listings / v_13_08 / beddow / netapi.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-02-04  |  5.4 KB  |  195 lines
  1. /* ******************************************************************** */
  2. /* Netbios API related functions                                               */
  3.  
  4. /* **********************************************  */
  5. /* NetBIOS call via 0x5C interrupt with auto retry */
  6. net_bios_call(ncbptr)
  7. struct Ncb *ncbptr ;
  8. { struct SREGS SegRegs ;
  9.   union REGS InRegs, OutRegs ;
  10.   struct Ncb  far *l_ptr ;
  11.  
  12.   l_ptr = (struct Ncb far *) ncbptr ;
  13.   segread(&SegRegs) ;
  14.   SegRegs.es = FP_SEG(l_ptr) ;
  15.   InRegs.x.bx = FP_OFF(l_ptr) ;
  16.   InRegs.x.ax = 0x400 ;
  17.  
  18.   int86x(0x5c, &InRegs, &OutRegs, &SegRegs) ;
  19.  
  20.   return(OutRegs.h.al) ;
  21. }
  22.  
  23. /* Check for netbios : return FALSE if found */
  24. chk_net_bios()
  25. { struct SREGS SegRegs ;
  26.   union REGS InRegs, OutRegs ;
  27.   struct Ncb  far *l_ptr ;
  28.   struct Ncb  test_ncb ;
  29.  
  30. /* First check Int 0x5c is loaded */
  31.   InRegs.x.ax = 0x355c ;        
  32.   int86x( 0x21, &InRegs, &OutRegs, &SegRegs) ;
  33.   if (SegRegs.es == 0 || SegRegs.es == 0xf000)
  34.     return(1) ;
  35.  
  36. /* Make an illegal Ncb request to double check */
  37.   memset(&test_ncb, 0, sizeof(struct Ncb)) ;
  38.   test_ncb.NCB_command = 0x7f ;
  39.   l_ptr = (struct Ncb far *) &test_ncb ;
  40.   segread(&SegRegs) ;
  41.   SegRegs.es = FP_SEG(l_ptr) ;
  42.   InRegs.x.bx = FP_OFF(l_ptr) ;
  43.   InRegs.x.ax = 0 ;
  44.  
  45.   int86x(0x5c, &InRegs, &OutRegs, &SegRegs) ;
  46.  
  47.   if (OutRegs.h.al)
  48.     return(0) ;
  49.   else
  50.     return(1) ;  
  51. }
  52.  
  53. /* Get Net bios error message */
  54. char *get_neterrmess(int error)
  55. { static char *mess1 = "Command not complete" ;
  56.   static char *mess2 = "Reply timeout" ;
  57.   static char *mess3 = "Hardware error" ;
  58.   static char *mess4 ="" ;
  59.   
  60.   if (error == 0xff)
  61.     return(mess1) ;
  62.   if (error == NETTIMEOUTERR)
  63.     return(mess2) ;
  64.   if (error >= 0x40 && error <= 0xfe)
  65.     return(mess3) ;
  66.   if (error <= 0x26)
  67.     return(neterrmess[error]) ;
  68.   return(mess4) ;
  69. }
  70.  
  71. /* ************************ */
  72. /* Handle the name commands */
  73. net_name_command(int command, char *name, PROC post, struct Ncb *ncbptr)
  74. { 
  75.    init_ncb(ncbptr) ;
  76.  
  77.    if (post == NULL)
  78.      ncbptr->NCB_command = command ;
  79.    else
  80.      ncbptr->NCB_post = (FARPROC)post ;
  81.    ncbptr->NCB_lana_num = 0 ;
  82.    set_ncb_name(name, ncbptr) ;
  83.     
  84.    return(net_bios_call(ncbptr)) ;
  85. }
  86.  
  87. /* **************************** */
  88. /* Handle the datagram commands */
  89. net_dgram_command(int command, int num, char *callname, void *buf, int buflen,
  90.                 FARPROC post, struct Ncb *ncbptr)
  91. { 
  92.    init_ncb(ncbptr) ;
  93.    ncbptr->NCB_command = command ;
  94.    ncbptr->NCB_post = post ;
  95.    ncbptr->NCB_lana_num = 0 ;
  96.    if (callname != NULL)
  97.      set_ncb_callname(callname, ncbptr) ;
  98.    ncbptr->NCB_num = num ;
  99.    ncbptr->NCB_buffer = (char far *)buf ;
  100.    ncbptr->NCB_length = buflen ;    
  101.  
  102.    return(net_bios_call(ncbptr)) ;
  103. }
  104.  
  105. /* ************** */
  106. /* Cancel command */
  107. net_command_cancel(struct Ncb *ncbcancelptr, struct Ncb *ncbptr)
  108. {  init_ncb(ncbptr) ;
  109.    ncbptr->NCB_command = NCBCANCEL ;
  110.    ncbptr->NCB_lana_num = 0 ;
  111.    ncbptr->NCB_buffer = (char far *)ncbcancelptr ;
  112.    ncbcancelptr->NCB_post = NULL ;
  113.    return(net_bios_call(ncbptr)) ;
  114. }
  115.  
  116.  
  117.  
  118. /* ****************************************************** */
  119. /* Utility functions                                      */
  120.  
  121. /* ********************************** */
  122. /* Initialise a Netbios control block (NCB) */
  123. init_ncb(struct Ncb *ncbptr)
  124. { int cnt = sizeof(struct Ncb) ;
  125.   char *c = (char *)ncbptr ;
  126.   while(cnt)
  127.     { *c++ = 0 ;
  128.       cnt-- ;
  129.     }
  130. }
  131.  
  132. /* ************************************************************************** */
  133. /* Copy a name string into an NCB name and pad string with spaces to 16 chars */
  134. set_ncb_name(char *name, struct Ncb *ncbptr)
  135. { int i ;
  136.   char *s ;
  137.  
  138.   strncpy((char *)ncbptr->NCB_name, name, 16) ;
  139.   s = (char *)(ncbptr->NCB_name) + strlen(name) ;
  140.   for (i = strlen(name); i < 16; i++)
  141.    *s++ = ' ' ;
  142. }
  143.  
  144. /* ******************************************************************************* */
  145. /* Copy a name string into an NCB call name and pad string with spaces to 16 chars */
  146. set_ncb_callname(char *name, struct Ncb *ncbptr)
  147. { int i ;
  148.   char *s ;
  149.  
  150.   strncpy((char *)ncbptr->NCB_callname, name, 16) ;
  151.   s = (char *)(ncbptr->NCB_callname) + strlen(name) ;
  152.   for (i = strlen(name); i < 16; i++)
  153.      *s++ = ' ' ;
  154. }
  155.  
  156. /* ********************************************************************* */
  157. /* Copy a NCB call name to a string, removing spaces at end of call name */
  158. char *ret_ncb_callname(char *name, struct Ncb *ncbptr)
  159. { int i = 16 ;
  160.   unsigned char *s = ncbptr->NCB_callname ;
  161.   
  162.   while (i-- && *(s + i) == ' ') ;
  163.   i++ ;
  164.   strncpy(name, (char *)ncbptr->NCB_callname, i) ;
  165.   *(name + i) = 0 ;
  166.  
  167.   return(name) ;
  168. }   
  169.  
  170.  
  171.  
  172. /* *********************************************************** */
  173. /* Net name list search functions */
  174.  
  175. /* ******************************************************** */
  176. /* Search the net name descriptor list for an entry by name */
  177. struct netrpcserver *netname(char *name)
  178. {  struct netrpcserver *srchptr ;
  179.  
  180.    srchptr = netrpcserverlist ;
  181.    while (strcmp(srchptr->name, name) && (srchptr = srchptr->prev) != NULL) ;
  182.    return(srchptr) ;
  183. }
  184.  
  185. /* ****************************************************** */
  186. /* Search the net name descriptor list for an entry by id */
  187. struct netrpcserver *netid(int id)
  188. {  struct netrpcserver *srchptr ;
  189.  
  190.    srchptr = netrpcserverlist ;
  191.    while (srchptr->id != id && (srchptr = srchptr->prev) != NULL) ;
  192.    return(srchptr) ;
  193. }
  194.  
  195.